home *** CD-ROM | disk | FTP | other *** search
/ The Uninvited Press Kit / THE UNINVITED.iso / pc / program.dxr / Internal_29_Save & Write Full.ls < prev    next >
Encoding:
Text File  |  2008-12-30  |  21.2 KB  |  350 lines
  1. global gphotolist, gSvFile, gLF, dLM, gMegs
  2.  
  3. on enterFrame me
  4.   if gphotolist = [] then
  5.     nothing()
  6.   else
  7.     Fdr = xtra("Filextra4").new()
  8.     Fdr.fx_FolderExists(gSvFile)
  9.     Fdr.fx_FolderCreate(gSvFile)
  10.     freeRoom = baDiskInfo(gSvFile, "Free")
  11.     freeMegs = freeRoom / 1024
  12.     if freeMegs < gMegs then
  13.       baDeleteFolder(gSvFile)
  14.       go("StopHere")
  15.     else
  16.       nothing()
  17.     end if
  18.   end if
  19. end
  20.  
  21. on handlerlist
  22.   sort(gphotolist)
  23.   image01 = "TTS-03906"
  24.   image02 = "TTS-02872"
  25.   image03 = "TTS-10102C"
  26.   image04 = "TTS-02102R"
  27.   image05 = "TTS-02195R"
  28.   image06 = "TTS-02402"
  29.   image07 = "TTS-11433"
  30.   image08 = "TTS-06077"
  31.   image09 = "TTS-08965R"
  32.   image10 = "TTS-01148Rv2"
  33.   image11 = "TTS-01742"
  34.   image12 = "TTS-02345R"
  35.   image13 = "TTS-07019"
  36.   image14 = "TTS-02847"
  37.   image15 = "TTS-02651"
  38.   image16 = "TTS-01632"
  39.   image17 = "TTS-06921"
  40.   image18 = "TTS-03316R"
  41.   image19 = "TTS-02439"
  42.   image20 = "TTS-00606"
  43.   image21 = "TTS-00964"
  44.   image22 = "U-KeyArt-1"
  45.   image23 = "U-KeyArt-2"
  46.   image24 = "U-KeyArt-3"
  47.   image25 = "U-KeyArt-x2"
  48.   image26 = "U-KeyArt-x3"
  49.   image27 = "TTS-05228"
  50.   image28 = "TTS-13628C"
  51.   image29 = "TTS-08823"
  52.   image30 = "TTS-16640"
  53.   image31 = "TTS-17762R"
  54.   image32 = "TTS-12288"
  55.   image33 = "TTS-KeyArt-1"
  56.   image34 = "TTS-KeyArt-2"
  57.   image35 = "TTS-KeyArt-3"
  58.   image36 = "TTS-4019-R"
  59.   image37 = "TTS-9781-R"
  60.   image38 = "TTS-KeyArt-1"
  61.   image39 = "TTS-KeyArt-2"
  62.   image40 = "TTS-KeyArt-3"
  63.   image41 = "TTS-KeyArt-7"
  64.   image42 = "TTS-KeyArt-8"
  65.   image43 = "TTS-00853"
  66.   image44 = "TTS-09258"
  67.   image45 = "TTS-00718"
  68.   image46 = "TTS-KeyArt-1"
  69.   image47 = "TTS-KeyArt-2"
  70.   image48 = "TTS-KeyArt-3"
  71.   image49 = "TTS-KeyArt-2"
  72.   repeat with i = 1 to gphotolist.count
  73.     Downloads = getAt(gphotolist, i)
  74.     xyz = the moviePath
  75.     origFile = xyz & "Images" & dLM
  76.     case Downloads of
  77.       "C01":
  78.         go("DL1")
  79.         Ok = baCopyFileProgress(origFile & image01 & ".jpg", gSvFile & image01 & ".jpg", "always", "Saving...", "Cancel", 32)
  80.       "C02":
  81.         go("DL2")
  82.         Ok = baCopyFileProgress(origFile & image02 & ".jpg", gSvFile & image02 & ".jpg", "always", "Saving...", "Cancel", 32)
  83.       "C03":
  84.         go("DL3")
  85.         Ok = baCopyFileProgress(origFile & image03 & ".jpg", gSvFile & image03 & ".jpg", "always", "Saving...", "Cancel", 32)
  86.       "C04":
  87.         go("DL4")
  88.         Ok = baCopyFileProgress(origFile & image04 & ".jpg", gSvFile & image04 & ".jpg", "always", "Saving...", "Cancel", 32)
  89.       "C05":
  90.         go("DL5")
  91.         Ok = baCopyFileProgress(origFile & image05 & ".jpg", gSvFile & image05 & ".jpg", "always", "Saving...", "Cancel", 32)
  92.       "C06":
  93.         go("DL6")
  94.         Ok = baCopyFileProgress(origFile & image06 & ".jpg", gSvFile & image06 & ".jpg", "always", "Saving...", "Cancel", 32)
  95.       "C07":
  96.         go("DL7")
  97.         Ok = baCopyFileProgress(origFile & image07 & ".jpg", gSvFile & image07 & ".jpg", "always", "Saving...", "Cancel", 32)
  98.       "C08":
  99.         go("DL8")
  100.         Ok = baCopyFileProgress(origFile & image08 & ".jpg", gSvFile & image08 & ".jpg", "always", "Saving...", "Cancel", 32)
  101.       "C09":
  102.         go("DL9")
  103.         Ok = baCopyFileProgress(origFile & image09 & ".jpg", gSvFile & image09 & ".jpg", "always", "Saving...", "Cancel", 32)
  104.       "C10":
  105.         go("DL10")
  106.         Ok = baCopyFileProgress(origFile & image10 & ".jpg", gSvFile & image10 & ".jpg", "always", "Saving...", "Cancel", 32)
  107.       "C11":
  108.         go("DL11")
  109.         Ok = baCopyFileProgress(origFile & image11 & ".jpg", gSvFile & image11 & ".jpg", "always", "Saving...", "Cancel", 32)
  110.       "C12":
  111.         go("DL12")
  112.         Ok = baCopyFileProgress(origFile & image12 & ".jpg", gSvFile & image12 & ".jpg", "always", "Saving...", "Cancel", 32)
  113.       "C13":
  114.         go("DL13")
  115.         Ok = baCopyFileProgress(origFile & image13 & ".jpg", gSvFile & image13 & ".jpg", "always", "Saving...", "Cancel", 32)
  116.       "C14":
  117.         go("DL14")
  118.         Ok = baCopyFileProgress(origFile & image14 & ".jpg", gSvFile & image14 & ".jpg", "always", "Saving...", "Cancel", 32)
  119.       "C15":
  120.         go("DL15")
  121.         Ok = baCopyFileProgress(origFile & image15 & ".jpg", gSvFile & image15 & ".jpg", "always", "Saving...", "Cancel", 32)
  122.       "C16":
  123.         go("DL16")
  124.         Ok = baCopyFileProgress(origFile & image16 & ".jpg", gSvFile & image16 & ".jpg", "always", "Saving...", "Cancel", 32)
  125.       "C17":
  126.         go("DL17")
  127.         Ok = baCopyFileProgress(origFile & image17 & ".jpg", gSvFile & image17 & ".jpg", "always", "Saving...", "Cancel", 32)
  128.       "C18":
  129.         go("DL18")
  130.         Ok = baCopyFileProgress(origFile & image18 & ".jpg", gSvFile & image18 & ".jpg", "always", "Saving...", "Cancel", 32)
  131.       "C19":
  132.         go("DL19")
  133.         Ok = baCopyFileProgress(origFile & image19 & ".jpg", gSvFile & image19 & ".jpg", "always", "Saving...", "Cancel", 32)
  134.       "C20":
  135.         go("DL20")
  136.         Ok = baCopyFileProgress(origFile & image20 & ".jpg", gSvFile & image20 & ".jpg", "always", "Saving...", "Cancel", 32)
  137.       "C21":
  138.         go("DL21")
  139.         Ok = baCopyFileProgress(origFile & image21 & ".jpg", gSvFile & image21 & ".jpg", "always", "Saving...", "Cancel", 32)
  140.       "C22":
  141.         go("DL22")
  142.         Ok = baCopyFileProgress(origFile & image22 & ".jpg", gSvFile & image22 & ".jpg", "always", "Saving...", "Cancel", 32)
  143.       "C23":
  144.         go("DL23")
  145.         Ok = baCopyFileProgress(origFile & image23 & ".jpg", gSvFile & image23 & ".jpg", "always", "Saving...", "Cancel", 32)
  146.       "C24":
  147.         go("DL24")
  148.         Ok = baCopyFileProgress(origFile & image24 & ".jpg", gSvFile & image24 & ".jpg", "always", "Saving...", "Cancel", 32)
  149.       "C25":
  150.         go("DL25")
  151.         Ok = baCopyFileProgress(origFile & image25 & ".jpg", gSvFile & image25 & ".jpg", "always", "Saving...", "Cancel", 32)
  152.       "C26":
  153.         go("DL26")
  154.         Ok = baCopyFileProgress(origFile & image26 & ".jpg", gSvFile & image26 & ".jpg", "always", "Saving...", "Cancel", 32)
  155.       "C27":
  156.         go("DL27")
  157.         Ok = baCopyFileProgress(origFile & image27 & ".jpg", gSvFile & image27 & ".jpg", "always", "Saving...", "Cancel", 32)
  158.       "C28":
  159.         go("DL28")
  160.         Ok = baCopyFileProgress(origFile & image28 & ".jpg", gSvFile & image28 & ".jpg", "always", "Saving...", "Cancel", 32)
  161.       "C29":
  162.         go("DL29")
  163.         Ok = baCopyFileProgress(origFile & image29 & ".jpg", gSvFile & image29 & ".jpg", "always", "Saving...", "Cancel", 32)
  164.       "C30":
  165.         go("DL30")
  166.         Ok = baCopyFileProgress(origFile & image30 & ".jpg", gSvFile & image30 & ".jpg", "always", "Saving...", "Cancel", 32)
  167.       "C31":
  168.         go("DL31")
  169.         Ok = baCopyFileProgress(origFile & image31 & ".jpg", gSvFile & image31 & ".jpg", "always", "Saving...", "Cancel", 32)
  170.       "C32":
  171.         go("DL32")
  172.         Ok = baCopyFileProgress(origFile & image32 & ".jpg", gSvFile & image32 & ".jpg", "always", "Saving...", "Cancel", 32)
  173.       "C33":
  174.         go("DL33")
  175.         Ok = baCopyFileProgress(origFile & image33 & ".jpg", gSvFile & image33 & ".jpg", "always", "Saving...", "Cancel", 32)
  176.       "C34":
  177.         go("DL34")
  178.         Ok = baCopyFileProgress(origFile & image34 & ".jpg", gSvFile & image34 & ".jpg", "always", "Saving...", "Cancel", 32)
  179.       "C35":
  180.         go("DL35")
  181.         Ok = baCopyFileProgress(origFile & image35 & ".jpg", gSvFile & image35 & ".jpg", "always", "Saving...", "Cancel", 32)
  182.       "C36":
  183.         go("DL36")
  184.         Ok = baCopyFileProgress(origFile & image36 & ".jpg", gSvFile & image36 & ".jpg", "always", "Saving...", "Cancel", 32)
  185.       "C37":
  186.         go("DL37")
  187.         Ok = baCopyFileProgress(origFile & image37 & ".jpg", gSvFile & image37 & ".jpg", "always", "Saving...", "Cancel", 32)
  188.       "C38":
  189.         go("DL38")
  190.         Ok = baCopyFileProgress(origFile & image38 & ".jpg", gSvFile & image38 & ".jpg", "always", "Saving...", "Cancel", 32)
  191.       "C39":
  192.         go("DL39")
  193.         Ok = baCopyFileProgress(origFile & image39 & ".jpg", gSvFile & image39 & ".jpg", "always", "Saving...", "Cancel", 32)
  194.       "C40":
  195.         go("DL40")
  196.         Ok = baCopyFileProgress(origFile & image40 & ".jpg", gSvFile & image40 & ".jpg", "always", "Saving...", "Cancel", 32)
  197.       "C41":
  198.         go("DL41")
  199.         Ok = baCopyFileProgress(origFile & image41 & ".jpg", gSvFile & image41 & ".jpg", "always", "Saving...", "Cancel", 32)
  200.     end case
  201.   end repeat
  202.   CopyrightText1 = "DreamWorks Pictures Presents In Association With Cold Spring Pictures A Parkes/MacDonald Production A Montecito Picture Company/Vertigo Entertainment Production " && QUOTE & "THE UNINVITED" & QUOTE && "starring Emily Browning, Elizabeth Banks, Arielle Kebbel and David Strathairn. The film is directed by The Guard Brothers from a screenplay by Craig Rosenberg and Doug Miro & Carlo Bernard.  The producers are Walter F. Parkes, Laurie MacDonald and Roy Lee. The executive producers are Michael Grillo, Doug Davison, Ivan Reitman and Tom Pollock.  This film has been rated PG-13 for violent and disturbing images, thematic material, sexual content, language and teen drinking."
  203.   CopyrightText2 = "¬© 2008 DreamWorks LLC and Cold Spring Pictures. All Rights Reserved"
  204.   put the long date into member "Caption Text"
  205.   put gLF after member "Caption Text"
  206.   put the time after member "Caption Text"
  207.   put gLF & "Location of the saved files is " & gSvFile after member "Caption Text"
  208.   put gLF & gLF & gLF after member "Caption Text"
  209.   put "********************" after member "Caption Text"
  210.   put gLF after member "Caption Text"
  211.   put "NOTE: Fully formatted captions in both MS Word and Adobe Acrobat formats are available on the" && QUOTE & "THE UNINVITED" & QUOTE && "CD in the 'Captions' Folder." after member "Caption Text"
  212.   put gLF after member "Caption Text"
  213.   put "********************" after member "Caption Text"
  214.   put gLF & gLF & gLF after member "Caption Text"
  215.   put "You have saved the following files to your hard drive:" after member "Caption Text"
  216.   put gLF after member "Caption Text"
  217.   put gLF after member "Caption Text"
  218.   if baFileExists(gSvFile & image01 & ".jpg") then
  219.     put image01 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  220.     put "Anna (Emily Browning, left) and Alex (Arielle Kebbel, right) are suspicious of their father's new fianc√©e in the haunting suspense thriller  " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  221.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  222.     put gLF & gLF & gLF & gLF after member "Caption Text"
  223.   end if
  224.   if baFileExists(gSvFile & image02 & ".jpg") then
  225.     put image02 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  226.     put "Anna (Emily Browning, left) is suspicious of her father's new fianc√©e, Rachel (Elizabeth Banks, right) in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  227.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  228.     put gLF & gLF & gLF & gLF after member "Caption Text"
  229.   end if
  230.   if baFileExists(gSvFile & image03 & ".jpg") then
  231.     put image03 & "                                Photo Credit: Kimberley French" & gLF after member "Caption Text"
  232.     put "Anna (Emily Browning, left) and Alex (Arielle Kebbel, right) are suspicious of their father's new fianc√©e in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  233.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  234.     put gLF & gLF & gLF & gLF after member "Caption Text"
  235.   end if
  236.   if baFileExists(gSvFile & image04 & ".jpg") then
  237.     put image04 & "                           Photo Credit: Kimberley French" & gLF after member "Caption Text"
  238.     put "Her father's new fianc√©e, Rachel (Elizabeth Banks, left), is growing tired of Anna's (Emily Browning, right) suspicions in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  239.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  240.     put gLF & gLF & gLF & gLF after member "Caption Text"
  241.   end if
  242.   if baFileExists(gSvFile & image05 & ".jpg") then
  243.     put image05 & "                               Photo Credit: Kimberley French" & gLF after member "Caption Text"
  244.     put "Alex (Arielle Kebbel, left) and Anna (Emily Browning, right) discuss their suspicions about their father's new fianc√©e on the dock outside their lake home in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  245.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  246.     put gLF & gLF & gLF & gLF after member "Caption Text"
  247.   end if
  248.   if baFileExists(gSvFile & image06 & ".jpg") then
  249.     put image06 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  250.     put "Arielle Kebbel stars as Alex in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  251.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  252.     put gLF & gLF & gLF & gLF after member "Caption Text"
  253.   end if
  254.   if baFileExists(gSvFile & image07 & ".jpg") then
  255.     put image07 & "                                Photo Credit: Kimberley French" & gLF after member "Caption Text"
  256.     put "Anna (Emily Browning, left) resumes her affection for Matt (Jesse Moss, right) following her mother's mysterious death in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  257.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  258.     put gLF & gLF & gLF & gLF after member "Caption Text"
  259.   end if
  260.   if baFileExists(gSvFile & image08 & ".jpg") then
  261.     put image08 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  262.     put "Alex (Arielle Kebbel, left) and Anna (Emily Browning, right) are united in their suspicions about their father's new fianc√©e in the haunting suspense thriller  " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  263.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  264.     put gLF & gLF & gLF & gLF after member "Caption Text"
  265.   end if
  266.   if baFileExists(gSvFile & image09 & ".jpg") then
  267.     put image09 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  268.     put "Rachel (Elizabeth Banks) has just become engaged to her former employer whose first wife died under mysterious circumstances while under her care in  " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  269.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  270.     put gLF & gLF & gLF & gLF after member "Caption Text"
  271.   end if
  272.   if baFileExists(gSvFile & image10 & ".jpg") then
  273.     put image10 & "                                Photo Credit: Kimberley French" & gLF after member "Caption Text"
  274.     put "(Left to right) Rachel (Elizabeth Banks) arouses the suspicions of Alex (Arielle Kebbel) and Anna (Emily Browning) when she becomes engaged to their father in the haunting suspense thriller  " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  275.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  276.     put gLF & gLF & gLF & gLF after member "Caption Text"
  277.   end if
  278.   if baFileExists(gSvFile & image11 & ".jpg") then
  279.     put image11 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  280.     put "Stephen (David Strathairn, left) turns a deaf ear to his daughter Anna's (Emily Browning, right) accusations against his new fianc√©e in the haunting suspense thriller " & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  281.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  282.     put gLF & gLF & gLF & gLF after member "Caption Text"
  283.   end if
  284.   if baFileExists(gSvFile & image12 & ".jpg") then
  285.     put image12 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  286.     put "Alex (Arielle Kebbel, left) and Anna (Emily Browning, right) discuss their suspicions about their father's new fianc√©e on the dock outside their lake home in the haunting suspense thriller  " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  287.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  288.     put gLF & gLF & gLF & gLF after member "Caption Text"
  289.   end if
  290.   if baFileExists(gSvFile & image13 & ".jpg") then
  291.     put image13 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  292.     put "Rachel (Elizabeth Banks) has just become engaged to her former employer whose first wife died under mysterious circumstances while under her care in " && QUOTE & "THE UNINVITED" & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  293.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  294.     put gLF & gLF & gLF & gLF after member "Caption Text"
  295.   end if
  296.   if baFileExists(gSvFile & image14 & ".jpg") then
  297.     put image14 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  298.     put "Her father's new fianc√©e, Rachel (Elizabeth Banks, left), is doing her best to get along with Anna (Emily Browning, right) in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  299.     put gLF & gLF & gLF & gLF after member "Caption Text"
  300.   end if
  301.   if baFileExists(gSvFile & image15 & ".jpg") then
  302.     put image15 & "                                  Photo Credit: Kimberley French" & gLF after member "Caption Text"
  303.     put "Anna (Emily Browning, left) is visited by her old boyfriend, Matt (Jesse Moss, right), who says he may have some important information about her mother's mysterious death in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  304.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  305.     put gLF & gLF & gLF & gLF after member "Caption Text"
  306.   end if
  307.   if baFileExists(gSvFile & image16 & ".jpg") then
  308.     put image16 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  309.     put "Arielle Kebbel stars as Alex in the haunting suspense thriller  " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  310.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  311.     put gLF & gLF & gLF & gLF after member "Caption Text"
  312.   end if
  313.   if baFileExists(gSvFile & image17 & ".jpg") then
  314.     put image17 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  315.     put "(Left to right) Rachel (Elizabeth Banks) welcomes home her fianc√©e Stephen's (David Strathairn) daughter Anna (Emily Browning) who has been in a psychiatric hospital for several months following her mother's mysterious death in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  316.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  317.     put gLF & gLF & gLF & gLF after member "Caption Text"
  318.   end if
  319.   if baFileExists(gSvFile & image18 & ".jpg") then
  320.     put image18 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  321.     put "Emily Browning stars as Anna in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  322.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  323.     put gLF & gLF & gLF & gLF after member "Caption Text"
  324.   end if
  325.   if baFileExists(gSvFile & image19 & ".jpg") then
  326.     put image19 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  327.     put "Alex (Arielle Kebbel, left) and Anna (Emily Browning, right) discuss their suspicions about their father's new fianc√©e on the dock outside their lake home in the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  328.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  329.     put gLF & gLF & gLF & gLF after member "Caption Text"
  330.   end if
  331.   if baFileExists(gSvFile & image20 & ".jpg") then
  332.     put image20 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  333.     put "(Left to right) Directors Charles and Tom Guard on the set of the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  334.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  335.     put gLF & gLF & gLF & gLF after member "Caption Text"
  336.   end if
  337.   if baFileExists(gSvFile & image21 & ".jpg") then
  338.     put image21 & "                                 Photo Credit: Kimberley French" & gLF after member "Caption Text"
  339.     put "(Left to right) Producer Walter F. Parkes and directors Charles and Tom Guard on the set of the haunting suspense thriller " && QUOTE & "THE UNINVITED." & QUOTE && CopyrightText1 & gLF after member "Caption Text"
  340.     put CopyrightText2 & gLF & gLF & gLF & gLF after member "Caption Text"
  341.     put gLF & gLF & gLF & gLF after member "Caption Text"
  342.   end if
  343. end
  344.  
  345. on exitFrame
  346.   handlerlist()
  347.   dsk = 0
  348.   go("WriteCap")
  349. end
  350.